home *** CD-ROM | disk | FTP | other *** search
/ LOGIC Apps / Logic-APPLE_II_APPS.iso / pc / LOGIC Apple II 5.25" Library - DOS Part 3 / DOS073.dsk / GRAPHIC SWITCH.bas < prev    next >
BASIC Source File  |  2012-02-16  |  303b  |  8 lines
  1. 5  POKE 768,173: POKE 769,86: POKE 770,192: POKE 771,173: POKE 772,87: POKE 773,192: POKE 774,76: POKE 775,0: POKE 776,3
  2. 10  GR 
  3. 20  COLOR= 15
  4. 30  HLIN 1,15 AT 5: VLIN 5,15 AT 15: HLIN 1,15 AT 15: VLIN 5,15 AT 1
  5. 40  HGR 
  6. 50  HCOLOR= 7
  7. 60  HPLOT 120,0 TO 240,0 TO 240,150 TO 120,150 TO 120,0
  8. 90  CALL 768